home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / WimpSWIs / s / 04DeleteW < prev    next >
Text File  |  1995-08-26  |  1KB  |  44 lines
  1. ;
  2. ;       Title                  : Wimp Delete Wind
  3. ;       System                 : Wimp Library
  4. ;       Version                : 1.01
  5. ;       Copyright              : (C) John Winters
  6. ;       Date                   : 12th January, 1990
  7. ;       Author                 : John H. Winters
  8. ;
  9. ;       Function               : Deletes a window.
  10. ;
  11. ;
  12. ;       Modification history.
  13. ;
  14. ;       Date                   : 03 Apr 1993
  15. ;       Author                 : Shaun Blackmore
  16. ;
  17. ;
  18. ;============================================================================
  19. ;
  20. ;  Include files.
  21. ;
  22. ;============================================================================
  23. ;
  24.         GET     ^.h.regdefs
  25.         GET     ^.h.swinos
  26.         GET     ^.h.macros
  27. ;
  28. ;============================================================================
  29. ;
  30. ;  Code.
  31. ;
  32. ;============================================================================
  33. ;
  34.         PREAMBLE
  35.         STARTCODE Wimp_DeleteWindow
  36. ;
  37.         STMFD   sp!, {a1, lr}
  38.         MOV     a2, sp
  39.         SWI     SWI_Wimp_DeleteWindow + XOS_Bit
  40.         MOVVC   a1, #0
  41.         LDMFD   sp!, {a2, pc}^
  42. ;
  43.         END
  44.